pcworld online logo

Bir Form ⁿzerinde birden τok g÷rⁿntⁿ kullanabilmek

╓yle zamanlar olur ki projenize bir form daha eklemek ya da ba■ka bir formÆu τa≡²rmak istemezsiniz. Ya da, aran²zda VB ile τa≡²r²lan formlar²n yava■ yⁿklendi≡ini dⁿ■ⁿnenler olabilir. O zaman biz de buna bir τ÷zⁿm bulal²m. Sadece resim kutular²n² kullanarak form ⁿzerinde de≡i■ik g÷rⁿntⁿler yaratabilir form ⁿzerindeki kontrollerin yerlerini sadece resim kutular²n²n yerlerini de≡i■tirerek tayin edebilirsiniz. ╓ncelikle a■a≡²daki 1.resimde g÷rⁿlen formu olu■turun. G÷rⁿlen kontrolleri resimde g÷rⁿldⁿ≡ⁿ gibi iki ayr² resim kutusu ⁿzerinde (s²n²rlar² iτine) yerle■tirin.
Kontrolleri yerle■tirdikten sonra formu sa≡ taraf²ndan daraltarak ikinci resim kutusunun ve ⁿstⁿndeki kontrollerin g÷rⁿlmemesini sa≡lay²n. Program² τal²■t²r²n ve opsiyon kutular²n² kullanarak formun g÷rⁿnen k²sm²ndaki de≡i■imi g÷rⁿn. ▌■te program²n²z²n kodlar². Oldukτa k²sa...
Private Sub Form_Load()
Option1.Value = 1 æOpsiyon kutucu≡u - 1Æin de≡erini "do≡ru" yap.
End Sub

Private Sub Option1_Click()
Picture1.Visible = True   æ1.resim kutusunu g÷rⁿlⁿr yap.
Picture2.Visible = False  æ2.Æni kaybet.
Picture1.Move 150, 150    æ1.kutucuk seτilirse 1. Resmi g÷rⁿlⁿr hale getir.
End Sub

Private Sub Option2_Click()
Picture2.Visible = True   æ2.resim kutusunu g÷rⁿlⁿr yap.
Picture1.Visible = False
Picture2.Move 150, 150    æ2.kutucuk seτilirse 2. Resmi g÷rⁿlⁿr hale getir.
End Sub